MoveWinOBJ  METHODS

  constructor Init;
  destructor  Done;
  procedure   SetBoundary(X1,Y1,X2,Y2:byte);
  procedure   SetSize(X1,Y1,X2,Y2,Style:byte);
  procedure   SetTitle(Title:string);
  procedure   SetColors(Border,Body,Title,Icons:byte);
  procedure   SetRemove(On:boolean);
  procedure   SetClose(On:boolean);
  procedure   SetAllowMove(On:boolean);
  procedure   GetSize(varX1,Y1,X2,Y2,Style:byte);
  function    GetX:byte;
  function    GetY:byte;
  function    GetStyle:byte;
  function    GetBorderAttr:byte;
  function    GetBodyAttr:byte;
  function    GetIconsAttr:byte;
  function    GetTitleAttr:byte;
  function    GetRemoveStatus:boolean;
  procedure   Draw;
  procedure   GrowDraw;
  procedure   Remove;
  procedure   WinKey(var K:word;var X,Y:byte);
  procedure   WinGetKey(varK:word;varX,Y:byte);